object Unity_StokAktarimF: TUnity_StokAktarimF
  Left = 243
  Top = 115
  BorderStyle = bsSingle
  Caption = 'Stok E'#351'le'#351'tirme (Unity Stok Aktar'#305'm)'
  ClientHeight = 506
  ClientWidth = 995
  Color = clBtnFace
  Font.Charset = TURKISH_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object S_Unity_Grid: TwwDBGrid
    Left = 1
    Top = 27
    Width = 468
    Height = 494
    DisableThemes = False
    Selected.Strings = (
      'LOGICALREF'#9'10'#9'Uniy Kod'#9'F'
      'CODE'#9'20'#9'Unity Stok Kodu'
      'NAME'#9'40'#9'Unity Stok Cinsi'
      'SPECODE'#9'8'#9'Specode')
    IniAttributes.Delimiter = ';;'
    TitleColor = clBtnFace
    FixedCols = 0
    ShowHorzScrollBar = True
    DataSource = Unity_StoklarS
    KeyOptions = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
    ReadOnly = True
    TabOrder = 2
    TitleAlignment = taLeftJustify
    TitleFont.Charset = TURKISH_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Arial'
    TitleFont.Style = []
    TitleLines = 1
    TitleButtons = True
    UseTFields = False
    OnTitleButtonClick = S_Unity_GridTitleButtonClick
    OnEnter = S_Unity_GridEnter
    OnKeyPress = S_Unity_GridKeyPress
  end
  object S_Casper_Grid: TwwDBGrid
    Left = 471
    Top = 27
    Width = 540
    Height = 494
    DisableThemes = False
    Selected.Strings = (
      'stokkodu'#9'20'#9'Casper Stok Kodu'#9'F'
      'cinsi'#9'37'#9'Casper Stok Cinsi'#9'F'
      'model'#9'16'#9'Casper Model'#9'F'
      'Unitystokkod'#9'8'#9'UnityCode'#9'F')
    IniAttributes.Delimiter = ';;'
    TitleColor = clBtnFace
    FixedCols = 0
    ShowHorzScrollBar = True
    DataSource = Casper_StoklarS
    KeyOptions = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
    PopupMenu = S_PopupMenu1
    ReadOnly = True
    TabOrder = 3
    TitleAlignment = taLeftJustify
    TitleFont.Charset = TURKISH_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Arial'
    TitleFont.Style = []
    TitleLines = 1
    TitleButtons = True
    UseTFields = False
    OnTitleButtonClick = S_Casper_GridTitleButtonClick
    OnEnter = S_Casper_GridEnter
    OnKeyPress = S_Casper_GridKeyPress
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 995
    Height = 24
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 0
    object S_bharama: TSpeedButton
      Left = 3
      Top = 3
      Width = 94
      Height = 20
      Caption = 'UNITY '
      Flat = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpVariable
      Font.Style = [fsBold]
      ParentFont = False
    end
    object S_Shape1: TShape
      Left = 112
      Top = 2
      Width = 304
      Height = 22
      Pen.Color = clRed
      Pen.Width = 2
    end
    object S_SpeedButton1: TSpeedButton
      Left = 467
      Top = 4
      Width = 94
      Height = 20
      Caption = 'CASPER'
      Flat = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpVariable
      Font.Style = [fsBold]
      ParentFont = False
    end
    object S_earama1: TStaticText
      Left = 114
      Top = 4
      Width = 300
      Height = 18
      AutoSize = False
      Font.Charset = TURKISH_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
    end
    object S_earama2: TStaticText
      Left = 575
      Top = 4
      Width = 300
      Height = 18
      AutoSize = False
      Font.Charset = TURKISH_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Pitch = fpVariable
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 467
    Width = 995
    Height = 39
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    DesignSize = (
      995
      39)
    object S_kapat: TBitBtn
      Left = 904
      Top = 8
      Width = 75
      Height = 25
      Anchors = [akTop, akRight]
      Caption = 'Kapat'
      TabOrder = 4
      OnClick = S_kapatClick
    end
    object S_baktarimyap: TBitBtn
      Left = 8
      Top = 8
      Width = 129
      Height = 25
      Caption = 'Aktar'#305'm Yap'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = S_baktarimyapClick
    end
    object S_byenistokkoduac: TBitBtn
      Left = 146
      Top = 7
      Width = 119
      Height = 25
      Caption = 'Yeni Stok Kodu A'#231
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = S_byenistokkoduacClick
    end
    object S_bolmayanibul: TBitBtn
      Left = 280
      Top = 8
      Width = 153
      Height = 25
      Caption = 'Olmayan'#305' Bul - F5'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      OnClick = S_bolmayanibulClick
    end
    object S_BitBtn6: TBitBtn
      Left = 488
      Top = 7
      Width = 97
      Height = 25
      Caption = 'Stok Kart'#305'n'#305' A'#231
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 3
      OnClick = S_BitBtn6Click
    end
  end
  object GroupBox1: TGroupBox
    Left = 0
    Top = 362
    Width = 995
    Height = 105
    Align = alBottom
    Caption = '  Cinsi De'#287'i'#351'en Stokkodlar'#305'   '
    TabOrder = 4
    object Panel3: TPanel
      Left = 838
      Top = 16
      Width = 155
      Height = 87
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 0
      object btReceteveStokkoduDegisti: TButton
        Left = 13
        Top = 18
        Width = 135
        Height = 50
        Caption = 'Re'#231'ete  ve Anastokkodu De'#287'i'#351'tirildi'
        TabOrder = 0
        WordWrap = True
        OnClick = btReceteveStokkoduDegistiClick
      end
    end
    object grdStokDegisti: TwwDBGrid
      Left = 2
      Top = 16
      Width = 836
      Height = 87
      DisableThemes = False
      Selected.Strings = (
        'stokkodu'#9'33'#9'stokkodu'#9#9
        'cinsi'#9'50'#9'cinsi'#9#9)
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      Align = alClient
      DataSource = dsStokdegisti
      KeyOptions = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgCancelOnExit, dgWordWrap]
      ReadOnly = True
      TabOrder = 1
      TitleAlignment = taLeftJustify
      TitleFont.Charset = TURKISH_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'Arial'
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = True
      UseTFields = False
    end
  end
  object S_Unity_Stoklarx: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    Left = 520
    Top = 56
  end
  object Unity_StoklarS: TDataSource
    DataSet = S_Unity_Stoklar
    Left = 408
    Top = 88
  end
  object Casper_StoklarS: TDataSource
    DataSet = S_Casper_Stoklar
    Left = 432
    Top = 152
  end
  object S_Casper_Stoklar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    AfterOpen = S_Casper_StoklarAfterOpen
    AfterInsert = S_Casper_StoklarAfterInsert
    BeforePost = S_Casper_StoklarBeforePost
    AfterCancel = S_Casper_StoklarAfterCancel
    Parameters = <>
    SQL.Strings = (
      'Select * from Stok'
      'order by stokkodu ')
    Left = 440
    Top = 240
  end
  object S_Unity_Stoklar: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    AfterDelete = S_Unity_StoklarAfterDelete
    Parameters = <>
    Left = 624
    Top = 72
  end
  object S_UnityStokkodVarmi: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'unitystokkod'
        Attributes = [paSigned, paNullable]
        DataType = ftInteger
        Precision = 10
        Size = 4
        Value = Null
      end>
    SQL.Strings = (
      'select * from stok where unitystokkod=:unitystokkod')
    Left = 624
    Top = 144
  end
  object S_StokVarmi: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltReadOnly
    Parameters = <
      item
        Name = 'stokkodu'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 25
        Value = Null
      end>
    SQL.Strings = (
      'select top 1 * from stok where stokkodu like :stokkodu')
    Left = 680
    Top = 200
  end
  object S_PopupMenu1: TPopupMenu
    Left = 696
    Top = 312
    object UnityIDSil1: TMenuItem
      Caption = 'Unity ID Sil'
      OnClick = UnityIDSil1Click
    end
  end
  object Casper_ServisQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'UnityDB'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 10
        Value = Null
      end>
    Prepared = True
    SQL.Strings = (
      
        'select id,soncekiszamani_stok,yil,UnityDataBase from Unity_Servi' +
        's where UnityDB=:UnityDB')
    Left = 784
    Top = 240
  end
  object adoUpdatePrgUnity: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * from Stok'
      'order by stokkodu ')
    Left = 512
    Top = 320
  end
  object S_Casper_StoklarX: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select * from Stok'
      'Where 1=2')
    Left = 432
    Top = 304
  end
  object S_UnityTemp: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    Parameters = <>
    Left = 714
    Top = 72
  end
  object S_UnityTemp2: TADOQuery
    Connection = dm.Connect_Unity
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    Left = 718
    Top = 121
  end
  object aqStokKistas: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    Parameters = <>
    SQL.Strings = (
      'select * from stStokKistas Where Aktarim=1'
      'order by Sira')
    Left = 759
    Top = 309
  end
  object aqStokdegisti: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    AfterOpen = aqStokdegistiAfterOpen
    Parameters = <>
    SQL.Strings = (
      'select Stokkod,Stokkodu,Cinsi from stok Where CinsiDegisti=1')
    Left = 710
    Top = 407
  end
  object dsStokdegisti: TDataSource
    DataSet = aqStokdegisti
    Left = 770
    Top = 406
  end
end
